' DrawCircle
' Test program to draw circles or ellipses
' A C Hewat    23rd March 1989

' Refere to page 8-32 of Basic Manual

Loop:

CLS
'INPUT "start"; begin
'INPUT "end"; finish
'INPUT "aspect"; asp

radius = 55
aspect = 0.1
WHILE aspect < 20
  CIRCLE (160,60),radius,,,,aspect
  aspect = aspect*1.4
WEND